home *** CD-ROM | disk | FTP | other *** search
/ Disc to the Future 2 / Disc to the Future Part II Programmer's Reference (Wayzata Technology)(6013)(1992).bin / PC / ADA / ADATUTOR / TRITYPE.DUM < prev    next >
Text File  |  1988-03-25  |  212b  |  8 lines

  1. -- Dummy solution for Outside Assignment 2
  2. -- Edit to become your real solution.
  3. separate (TRITEST)
  4. function TRITYPE(LEN1, LEN2, LEN3 : in INTEGER) return TRIANGLE is
  5. begin
  6.    return NOT_A_TRIANGLE;
  7. end TRITYPE;
  8.